(Fy_or_n_p, Fyes_or_no_p) [HAVE_X_MENU]: Redisplay before popping up a menu.

diff --git a/src/fns.c b/src/fns.c
index 1589176485a7d86634bd7d502b432348287a45e3..35cd7e4bca54562302b545ae5ef2e91c51d50524 100644 (file)
--- a/src/fns.c
+++ b/src/fns.c
@@ -1136,6 +1136,7 @@ Also accepts Space to mean yes, or Delete to mean no.")
          && using_x_p ())
        {
          Lisp_Object pane, menu;
+         redisplay_preserve_echo_area ();
          pane = Fcons (Fcons (build_string ("Yes"), Qt),
                        Fcons (Fcons (build_string ("No"), Qnil),
                               Qnil));
@@ -1238,6 +1239,7 @@ and can edit it until it as been confirmed.")
       && using_x_p ())
     {
       Lisp_Object pane, menu, obj;
+      redisplay_preserve_echo_area ();
       pane = Fcons (Fcons (build_string ("Yes"), Qt),
                    Fcons (Fcons (build_string ("No"), Qnil),
                           Qnil));